home *** CD-ROM | disk | FTP | other *** search
/ MediaClips: Full Bloom / Aris MediaClips - Full Bloom.iso / mac / Full Bloom™ / Full Bloom™.rsrc / LENS_135_Picture Picker.bin < prev    next >
Text File  |  1993-05-18  |  1KB  |  39 lines
  1. ItemType: WIND
  2. Rect: 103,107,537,345
  3. Style: Window
  4. HasTitleBar: TRUE
  5. HasZoomBox: TRUE
  6. HasCloseBox: TRUE
  7. HasGrowBox: TRUE
  8. MinSize: 196,117
  9. MaxSize: 640,480
  10. Name: Picture Picker
  11. WhiteColor: -17477,-17477,-17477
  12. Script: --on windowEvent  wdID,wdName,objNo,objName,objValue┬┬if objValue="Open" then ┬  ┬else if objValue="Close" then ┬  ┬else if objValue="Suspend" then ┬  ┬else if objValue="Resume" then ┬  ┬else if objValue="CloseBox" then ┬  ┬else if objValue="ZoomBox" then ┬  ┬else if objValue="GrowBox" then ┬  ┬else if objValue="TitleBar" then ┬  ┬end if┬┬--end windowEvent
  13.  
  14. ItemType: LIST
  15. Rect: 8,8,425,210
  16. TextFont: Geneva
  17. TextSize: 9
  18. Name: ICN#List
  19. Style: ListOfFinderIcons
  20. Logic: Single
  21. KeyScroll: TRUE
  22. Text: 
  23. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬global windowName┬put i1_Selection of window wdName into x┬set i3_Text of window wdName to line x of pList┬wait 10┬if the mouseClick then┬  if i3_Text of window wdName ¡ empty then┬    put i3_Text of window wdName into windowName┬    close window wdName┬    put TRUE into newPict┬  end if┬end if┬--end mouseUp
  24.  
  25. ItemType: LBL
  26. Rect: 9,219,74,231
  27. TextFont: Geneva
  28. TextSize: 9
  29. Text: Selected File:
  30.  
  31. ItemType: TEXT
  32. Rect: 74,219,256,231
  33. TextFont: Geneva
  34. TextSize: 9
  35. AutoSize: FALSE
  36. Name: Text
  37. WhiteColor: -17477,-17477,-17477
  38. TextStyle: Bold
  39. Text: